﻿
Public Class clsInstrument

    Private c_Name As String
    Private c_VSTInstrument As String
    Private c_Description As String
    Private c_fxpPath As String
    Private c_UID As Guid
    Private c_IsSelected As Boolean

    Public Property Name() As String
        Get
            Return c_Name
        End Get
        Set(ByVal value As String)
            c_Name = value
        End Set
    End Property
    Public Property VSTInstrument() As String
        Get
            Return c_VSTInstrument
        End Get
        Set(ByVal value As String)
            c_VSTInstrument = value
        End Set
    End Property
    Public Property Description() As String
        Get
            Return c_Description
        End Get
        Set(ByVal value As String)
            c_Description = value
        End Set
    End Property
    Public Property fxpPath() As String
        Get
            Return c_fxpPath
        End Get
        Set(ByVal value As String)
            c_fxpPath = value
        End Set
    End Property
    Public Property IsSelected() As Boolean
        Get
            Return c_IsSelected
        End Get
        Set(ByVal value As Boolean)
            c_IsSelected = value
        End Set
    End Property

    Public Sub New()

    End Sub

End Class
